Data=importdata('1.txt');
Extra=[0,0];
A=[Data;Extra];
B=zeros(100,1)
C=zeros(100,1);
D=zeros(100,1)
E=zeros(100,1);
F=zeros(100,1)
G=zeros(100,1);
H=zeros(100,1)
I=zeros(100,1);
J=zeros(100,1)
K=zeros(100,1);

for i=1:100
    B(i,1)=-5+0.1*i;
    C(i,1)=1/(1+B(i,1)*B(i,1));
end
for i=1:100
    t=-5+0.1*i;
    D(i,1)=t;
    E(i,1)=0;
    sum1=1;
    sum2=A(1,1);
    for j=1:3
        E(i,1)=E(i,1)+sum1*sum2;
        sum1=sum1*(t-A(j,2));
        sum2=A(j+1,1);
    end
end
for i=1:100
    t=-5+0.1*i;
    F(i,1)=t;
    G(i,1)=0;
    sum1=1;
    sum2=A(4,1);
    for j=1:5
        G(i,1)=G(i,1)+sum1*sum2;
        sum1=sum1*(t-A(j+3,2));
        sum2=A(j+4,1);
    end
end
for i=1:100
    t=-5+0.1*i;
    H(i,1)=t;
    I(i,1)=0;
    sum1=1;
    sum2=A(9,1);
    for j=1:7
        I(i,1)=I(i,1)+sum1*sum2;
        sum1=sum1*(t-A(j+8,2));
        sum2=A(j+9,1);
    end
end
for i=1:100
    t=-5+0.1*i;
    J(i,1)=t;
    K(i,1)=0;
    sum1=1;
    sum2=A(16,1);
    for j=1:9
        K(i,1)=K(i,1)+sum1*sum2;
        sum1=sum1*(t-A(j+15,2));
        sum2=A(j+16,1);
    end
end
 plot(B,C,'blue',D,E,'red',F,G,'green',H,I,'yellow',J,K,'black');